home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The X-Philes (2nd Revision)
/
The X-Philes Number 1 (1995).iso
/
xphiles
/
hp48_2
/
phone_ch
< prev
next >
Wrap
Internet Message Format
|
1995-03-31
|
13KB
From: Chad Huff <choochoo@maple.circa.ufl.edu>
Subject: v04i030: phone_ch - Phone List Manager v1.0, Part01/01
Newsgroups: comp.sources.hp48
Followup-To: comp.sys.hp48
Approved: spell@seq.uncwil.edu
Checksum: 3610735409 (verify with brik -cv)
Submitted-by: Chad Huff <choochoo@maple.circa.ufl.edu>
Posting-number: Volume 4, Issue 30
Archive-name: phone_ch/part01
BEGIN_DOC phone.doc
Phonebook 1.0
-------------
by Chad Huff
choochoo@maple.circa.ufl.edu
March 1, 1992
This is a comprehensive phonelist manager. It lets you
display, search and manipulate lists. It allows for multiple
databases which keeps your information better organized and more
manageable. It also allows you to switch between databases. The
display function will view up to eleven names and numbers on the
display at once and lets you quickly scroll up or down through the
list.
INSTRUCTIONS:
Download the program to the HP. Switch to the new directory
and press <BEGIN>. It will prompt you for the name of a database.
Anything is fine as long as it is not an HP48 command. You will be
presented with a menu with the following commands:
<ADD> This lets you add a name to the list
<FIND> This lets you search the list for a given name. If the
search string is found you will be presented with another menu and
the following three choices:
<EXIT> takes you back to the main menu without doing anything.
<DEL> deletes the entry from the list.
<EDIT> allows you to edit the given entry. You are
presented with the edit menu and the following choices:
<EXIT> returns you to the previous menu and the three
choices above.
<NUM> allows you to change the number. Hit ENTER when
done then either press <EXIT> or <NAME>
<NAME> allows you to change the name. Hit ENTER when done
then either press <EXIT> or <NUM>.
If the search string is not found it will return the remainder of
the list that is lexically greater than the search string to the
display. This allows you to search large lists alphabetically.
<LIST> lets you view the list on the display. Scroll up and down
quickly using the up and down arrow keys. Use right-shift and the
arrow keys to go to the top or bottom of the list. Press ATTN to
return to the main menu.
<NEW> lets you switch between databases or create new ones.
<EXIT> exits the program. **MAKE SURE YOU EXIT THE PROGRAM THIS
WAY OTHERWISE YOUR CHANGES WILL BE LOST**.
Comment: This is my first attempt at programming the HP48. I'm
sure it's a little crude. I tried to work out all the bugs but I'm
sure I didn't catch them all. If you find any bugs please let me
know or if you have any suggestions. Let me know what you think
about it if nothing else. I would appreciate the feedback. Send
Email to "choochoo@maple.circa.ufl.edu".
Thanx -- Chad
END_DOC
BEGIN_ASC phone.asc
%%HP: T(3)A(D)F(.);
"69A20FF72031000000400525F4744069A20FF76C2100000040050514254047A2
0779200000000000000569000000000000013977920000000000000056000000
00000000230C1BA44B2A2A2BA4166E195BA4B213097000303435453047A2084E
203014444484E20406494E44484E2040C494354584E2030E4547547A20B21308
4E204054859445B21305600040C494354540D9D20E1632C2A207200002020202
342756164796E67602C49637473F2A2485A1C2A20920000202020205C6561637
560275169647E2E2E2D13A2485A184E207044943505C4149584E203034C43593
632B21300B000405485944540D9D20E1632C2A20F10000586F6E65626F6F6B60
213E2033F2A20DCF1BB8A193632B2130350004035F4254540D9D20E1632A59C1
78BF13CE229C2A2279E1AFE22387C15BF22D9D20387C13C03233920100000000
00000105D2C19C2A27C8D13F2A20DCF14B2A23F2A20DCF13C0323F2A25BCF18D
BF178BF13F2A20DCF17C8D1D13A2A9CF12ABF18DBF19C2A26C7D1DBBF19C2A26
C7D13CE22EBBE1AFE22D9D20D13A20DCF1339201000000000000010472C1B213
05BF22D9D20803A20DCF1B21305DF22DE032339201000000000000469313C19B
6323FBF1387C1DE032339201000000000000010063C19B632B21305DF2293632
B21300A1003014444430D9D20E1632A59C19C2A276BA1C2A20F0000E416D656A
347A2084E2010C8B2130AC422C2A20F10000586F6E65602E457D6265627A347A
2084E2010C8B2130AC422ED2A2387C1DBBF1387C1C2A205300035F4254594E47
402D20205C6561637560275169647E2E2E29C2A2485A1C2A207000002ED2A248
5A184E204035F4254584E203034C43593632B2130F11003034C43530D9D20E16
3247A2084E203014444484E20406494E44484E2040C494354584E2030E454754
7A20B213084E204054859445B213069112858A1C2A20D20000202023556C6563
6470216026457E6364796F6E63F2A2485A13F2A24A5A193632B21309C0004064
94E44440D9D20E163278BF1A59C178BF13CE224B2A2D9AE1AFE22D9D2046CF1C
2A20120003556162736860235472796E676A347A2084E2010C8B2130AC422DBB
F13392010000000000000105D2C19C2A23C0327C8D1A59C18DBF1DBBF1D13A2A
9CF12ABF13CE22279E1AFE22D9D208DBF1DBBF184E2060E455D4449435E0CF18
DBF13F2A24A5A127432339201000000000000010472C13392010000000000004
695D2C1B21305BF22D9D203CE22D5CE1AFE22D9D208DBF192CF1A59C178BF1ED
2A276BA15BCF1ED2A290DA1DBBF192CF190DA1DBBF192CF1ED2A276BA10DCF13
87C1858A1C2A20B200002020235472796E67602E4F6470264F657E6463F2A248
5A184E207044943505C414958DBF146CF1339201000000000000010472C1DBBF
18DBF1B21305BF228DBF15DF22B21305DF223CE2233920100000000000046931
3C1AFE22D9D208DBF1DBBF18DBF1858A1C2A20B200002020235472796E67602E
4F6470264F657E6463F2A2485A1339200000000000000510F17A133920100000
0000000010472C1B21305DF22DE032339201000000000000010313C19B632B21
305BF22D9D208DBF1C2A20B10000202020202542525F425A33F2A2485A1C2A20
32000020202020254D607479702C4963747D13A2485A13392020000000000000
503392099900000000052104C5A19C2A2F17A1B21305DF2284E203034C435936
32B2130B04007044943505C4149570D9D20E163278BF1A59C178BF178BF178BF
13CE224B2A2D9AE1AFE22D9D209C2A276BA1233A2EEDA1B9691E4A2051000380
0000000000000DBBF1614E1C2A2013000052554353502144545E40245F40234F
4E44594E455549C2A2DA5E147A20E4A20510006100000000000000E4A2051000
0000000000000000B2130DBBF1AE8C19C2A2E0CF10A132D6E201096D6E201096
3F2A2A9CF1DBBF190DA19C2A276BA1B0BC1803A25BCF1A59C18DBF1C2A209000
0E2023F2A20DCF1C2A20F1000D2D2D2D2D2D2D2D2D2D2D2D202DBBF176BA19C2
A2DA5E1803A20DCF176BA176BA1C2A20700000276BA19C2A2DA5E1803A2A9CF1
D6E20109690DA19C2A276BA1233A2EEDA1B9691E4A2051000000000000000000
092CF1E4A20510009100000000000000DBBF1ED2A2387C1233A25BCF1DBBF123
3A25BCF1AE8C13F2A20DCF1DBBF1ED2A2387C1E0CF1AE8C1C4232634E1DCC028
DBF147A20B21300F2E1B21305BF22D9D20C2A20D1000020202020202542525F4
25A33F2A2485A1C2A205200002020202020254D607479702C4963747D13A2485
A13392020000000000000503392099900000000052104C5A1339200000000000
000510F17A13F2A246CF1B21305DF2284E203034C43593632B2130AA30030445
4C430D9D20E1632DBBF1A59C178BF178BF13F2A276BA15BCF178BF13CE229C2A
2279E1AFE22D9D208DBF178BF19C2A276BA1B21305DF2290DA13F2A276BA15BC
F18DBF19C2A290DA1387C1339202000000000000030339209990000000000050
4C5A1C2A203200002020202020202024454C454455444233A2485A1339200000
000000000510F17A1BB8A193632B21305210030E4547530D9D20E1632D13A247
2C1BB8A193632B2130D2000405444944540D9D20E163278BF1E0CF1A59C178BF
178BF13F2A276BA15BCF178BF13CE229C2A2279E1AFE22D9D208DBF178BF19C2
A276BA1B21305DF2290DA13F2A276BA178BF19C2A276BA15BCF1A59C18DBF147
A2084E2040E414D45484E2030E457D647A20B213047A20B213047A20B213047A
20C2A20D00005485944584E205054E4445444B2130B2130691123F2A24A5A127
43293632B21306310030E457D630D9D20E163292CF1DBBF184E2010C8ED2A238
7C1AC422C2A20F200044F4E45402D202E457D626562702348616E67656469C2A
2485A1C2A207000002ED2A2485A1339202000000000000050339209990000000
0005204C5A13F2A24A5A193632B2130DC00040E414D45440D9D20E163278BF1E
0CF184E2010C8ED2A2387C1AC422DBBF1C2A20B200044F4E45402D202E416D65
602348616E67656469C2A2485A1C2A20900000202ED2A2485A13392020000000
000000503392099900000000005204C5A13F2A24A5A193632B21302D0005054E
444544450D9D20E16322ABF184E2060E455D4449435ED2A2387C1DBBF10DCF13
87C1DBBF13F2A24A5A1BB8A193632B21307600060E455D444943560D9D20E163
2858A1803A2485A1ED2A2485A147A2084E20405444944584E20304454C447A20
B213047A20B213047A20B213047A20C2A20D000054859445D9D20E16328DBF1B
B8A193632B2130B2130B21306911293632B21300C00040441445144069A20FF7
000003F2105024547494E450D9D20E16323C032D13A25D2C184E20400525F474
84E204044144514491A1A59C178BF178BF13CE224B2A2279E1AFE22D9D203FBF
1C2A20F300054E64756270247865602E616D656A0F6660216024416471626163
756A347A2084E2010C8B2130AC42278BF162BC1B21305BF22D9D203CE229C2A2
279E1AFE22D9D208DBF1B0BC1C2A20F70008496470254E64756270247F602573
7560247869637A0441647162616375602F627024797075602478656A0E616D65
602F666021602E6567702F6E656E2DBBF184E2010C8ED2A2387C1AC42278BF16
2BC1EB3A1B21305BF22D9D2046CF1C2A20770000527563737021602B65697026
6F6270216A0441647162616375602F627024797075602478656A0E616D65602F
666021602E6567702F6E656E247A2084E203014C474B2130AC42278BF162BC1B
21305DF22B21305DF2278BF13CE2268BC1D13A2D9AE1AFE22D9D208DBF147A20
B2130B21305DF22B51A1DBBF162BC1DBBF184E203034C4352743284E20404414
4514DBBF1DCC02B51A1B51A1ED2A269112DE032D13A2063C19B63293632B2130
C1C8"
END_ASC
BYTES: #8C1Ch 2857.5
BEGIN_UU phone.uue
begin 644 PHONE.
M2%!(4#0X+466*O!_`A,````$4%)/1P26*O!_QA(````$4%!!4@1T*G"7`@``
M`````%"6````````$)-W*0````````!E`````````#+`L4JTHJ*R2F'FD;5*
M*S&0!P`#0U-4`W0J@.0"`T%$1$@N0&"4Y$2$Y`($3$E35$@N,.!4=$6G`BLQ
M@.0"!$58250K,5`&``1,25-4!)TMX&$C+"IP`@`@("`@0W)E871I;F<@3&ES
M=/.B0E@:+"J0`@`@("`@4&QE87-E(%=A:70N+BX=HT)8&D@N<$"4-`7%%)2%
MY`(#0TQ3.3:R$@.P`$!0A)5$1=#9`AXVPJ("'P``A?;F5B;V]K8&$N,",R\J
MT/RQBQHY-K(2`U,`0##U)$5%T-D"'C:BE1R'^S'L(LFB(I<>^BXR>!RU+]+9
M`H/',0PC,RD0````````$%`M',FB<HP=\Z("S1^THC(O*M#\,0PC\Z)2RQ_8
M^W&X'_.B`LT?Q]C1,2J:_"&Z']C[D2PJQM?1NQ_)HF)\'<,NXKL>^B[2V0(=
MHP+-'S,I$````````!!`)QPK,5#[(ITM@#`JT/RQ$@/5+](.(S,I$```````
M`&0Y,1RY-C*_'X/'T0XC,RD0````````$``V'+DVLA(#U2^28R,K,0`:``-!
M1$0#G2W@82-:R9$L*F>KP:("#P#@%-96ID.G`D@N$,"X$@/*),*B`A\``(7V
MYE8&XE37)E8FIT.G`D@N$,"X$@/*).(M*H/'T;L?@\?!H@(U`##U)$65Y'0$
MT@("Q586-E<&<A661N?BXI(L*H2EP:("!P``XBTJA*6!Y`($4T]25$@N,##$
M-)5C(RLQ\!$``T-,4P.=+>!A(W0J@.0"`T%$1$@N0&"4Y$2$Y`($3$E35$@N
M,.!4=$6G`BLQ@.0"!$58250K,6`9(5BHP:("+0```@(R5<96-D8'$@9B5.<V
M1I?VYC8O*H2E,2\JI*618R,K,9`,``1&24Y$!)TMX&$CA_NAE1R'^S'L(K2B
MTJD>^B[2V0)D_,&B`B$`,%46)C>&!C)%)Y?F=J9#IP)(+A#`N!(#RB32NQ\S
M*1`````````04"T<R:(R#"/'V*&5'-C[T;L?':.BR1^B^S'L(G+IH>\BG2V`
MO1^]^X'D`@9.54U$25,._(&]'_.B0EH:<C0RDP(!`````````73",9,"`0``
M````0);5PK$2`[4OTMD"PR[2Q1[Z+M+9`MC[D<(?6LEQN!_>HG*V&K7\X2TJ
M":W1NQ\I_)'0&KW[D<(?WJ)RMAK0_#%X'%BHP:("*P```@(R12>7YG8&XO1&
M!V+T5N=&-B\JA*6!Y`('1$E34$Q!6=C[0<8?,RD0````````$$`G'+W[@;T?
M*S%0^R+8^U'](BLQ4/TBPRXRDP(!``````!`EA/#H>\BG2V`O1^]^X&]'UBH
MP:("*P```@(R12>7YG8&XO1&!V+T5N=&-B\JA*4QDP(```````!0`1^G,9,"
M`0````````%TPK$2`]4OT@XC,RD0````````$#`Q'+DVLA(#M2_2V0+8^\&B
M`AL```("`@)2)"7U)*4S+RJ$I<&B`B,```("`@)2U`9'EP?"E#9'US$JA*4Q
MDP("````````!3,ID)D`````4!)`7!K)HO)Q&BLQ4/TB2"XP,,0TE6,C*S&P
M0``'1$E34$Q!60>=+>!A(X?[H94<A_MQN!^'^S'L(K2BTJD>^B[2V0+)HG*V
M&C*CXMX:FY;AI`(5`#`(````````T+L?%N3!H@(Q```E530U!1)$1>4$0O4$
M,O3D1)7D5%64+"JMY4&G`DXJ4`$`%@````````!.*E`!````````````*S'0
MNQ_JR)$L*@[\`1HC;2X0D-;F`@%I\Z*BR1^]^Y'0&LFB<K8:"\N!,"JU_*&5
M'-C[P:(""0#@`C(O*M#\P:("'P#0TM+2TM+2TM+2TM("TKL?9ZN1+"JMY8$P
M*M#\<;8:9ZO!H@('``!RMAK)HM):'@BCHLD?;2X0D);0&LFB<K8:,J/BWAJ;
MEN&D`A4```````````"0PA].*E`!`!D`````````O?OA+2J#QR$S*K7\T;L?
M,J-2RQ_JR#$O*M#\T;L?WJ(R>!P._*&.'$PR8D,>S0R"O1]T*K`2`_#BL1(#
MM2_2V0(L*M`!`"`@("`@($524D]2.O.B0E@:+"I0`@`@("`@("!%;7!T>2!,
M:7-T':-"6!HS*2````````!0,),"F0D`````)0'$I3&3`@```````%`!'Z<Q
M+RID_+$2`]4O@N0"`T-,4SDVLA(#J@,P0%3$--#9`AXVTKL?6LEQN!^'^S$O
M*F>K4<L?A_LQ["+)HB*7'OHNTMD"V/MQN!_)HG*V&BLQ4/TB":TQ+RIGJU'+
M']C[D2PJ":TQ>!PS*2`````````P,),"F0D```````7$I<&B`B,```("`@("
M`@)"5,141%5$)#,JA*4QDP(```````!0`1^GL8L:.3:R$@,E`3#@5'0UT-D"
M'C;2,2ITPK&+&CDVLA(#+0!`4$241$70V0(>-G*X'P[\H94<A_MQN!_SHG*V
M&K7\<;@?PRZ2+"IRZ:'O(ITM@+T?A_N1+"IGJ[$2`]4ODM`:\Z)RMAJ'^Y$L
M*F>K4<L?6LF!O1]T*H#D`@1.04U%2"XPX%371J<"*S%`IP(K,4"G`BLQ0*<"
M+"K0``!%6$E42"Y04.1$5$2T$@,K,6`9(?.B0EH:<C228R,K,6`3``-.=6T#
MG2W@82,I_-&['T@N$,#H+2J#QZ%,(BPJ\`(`1$].12`M($YU;6)E<B!#:&%N
M9V5DR:)"6!HL*G```"#>HD)8&C,I(````````%`PDP*9"0````!0`L2E,2\J
MI*618R,K,=`,``1.04U%!)TMX&$CA_OAP!](+A#`Z"TJ@\>A3"*]^\&B`BL`
M0/3D5`32`N(4UE8&,H06YG961I8L*H2EP:(""0```N(M*H2E,9,"`@``````
M``4S*9"9```````E0%P:\Z)"6AHY-K(2`](`4%#D1%1$5-#9`AXV(KH?2"Y@
MX%351)0TY2TJ@\?1NQ_0_#%X'+W[,2\JI*6QBQHY-K(2`V<`8.!4U424-&70
MV0(>-H*%&@BC0E@:WJ)"6!IT*H#D`@1%1$E42"XP0%3$1*<"*S%`IP(K,4"G
M`BLQ0*<"+"K0``!%6$E4G2W@82/8^[&+&CDVLA(#*S&P$@.6$9)C(RLQ``P`
M!$1!5$$$EBKP?P``,"\!!4)%1TE.!9TMX&$CPS#2,2K5PH'D`@104D]'2"Y`
M0!1$%409&EK)<;@?A_LQ["*THB*7'OHNTMD"\_O!H@(_`%#D1E<F!T*'5@;B
M%M96IO!F!A(&0A1&%R86-E>F0Z<"2"X0P+@2`\HD<K@?)LNQ$@.U+]+9`L,N
MDBPJ<NFA[R*=+8"]'PO+P:("?P"`E$8'4N1&5R8'0O<&4C=7!D*'EC:G0!1&
M%R86-E<&\B8'0I<'5P9"AU:FX!;65@;R9@82!N)6=@?RYE;FTKL?2"X0P.@M
M*H/'H4PBA_MALAR^H[$2`[4OTMD"9/S!H@)W```E5S8W!Q(&LE:6!V+V)@<2
MID`41A<F%C97!O(F!T*7!U<&0H=6IN`6UE8&\F8&$@;B5G8'\N96YD*G`D@N
M,!#$=+02`\HD<K@?)LNQ$@/5+[(2`]4O<K@?PRYBN!P=H]*I'OHNTMD"V/M!
MIP(K,;`2`]4OLA4:O?MALAR]^X'D`@-#3%-R-(+D`@1$051!O?O1S"!;H;$5
5&MZB8ADA[3#2,2I@PY%K(SDVLA(#
`
end
END_UU